home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / bbozu7.dir / 00367_Script_éDǝéÊÇÁÇÍÇýéû < prev    next >
Text File  |  1995-11-13  |  736b  |  42 lines
  1. on TakeItadakiT
  2.   set Rand = random(4)
  3.   if Rand = 1 then UnLuckyT1
  4.   else
  5.     if Rand = 2 then UnLuckyT2
  6.     else
  7.       if Rand = 3 then UnLuckyT3
  8.       else
  9.         if Rand = 4 then UnLuckyT4
  10.       end if
  11.     end if
  12.   end if
  13. end
  14.  
  15. on TakeItadakiH
  16.   set Rand = random(4)
  17.   if Rand = 1 then UnLuckyH1
  18.   else
  19.     if Rand = 2 then UnLuckyH2
  20.     else
  21.       if Rand = 3 then UnLuckyH3
  22.       else
  23.         if Rand = 4 then UnLuckyH4
  24.       end if
  25.     end if
  26.   end if
  27. end
  28.  
  29. on TakeItadakiB
  30.   set Rand = random(4)
  31.   if Rand = 1 then UnLuckyB1
  32.   else
  33.     if Rand = 2 then UnLuckyB2
  34.     else
  35.       if Rand = 3 then UnLuckyB3
  36.       else
  37.         if Rand = 4 then UnLuckyB4
  38.       end if
  39.     end if
  40.   end if
  41. end
  42.